www.gusucode.com > 网域标准通用企业自助建站系统正式版 2009 > 网域标准通用企业自助建站系统正式版 2009.18/网域公司企业网站管理系统ACCESS和SQL正式版/网域公司企业网站管理系统SQL正式版/PreviewOrder.asp
<!--#include file="inc/conn.asp" --> <% UserName=session("UserName") Receiver=request.form("Receiver") Postcode=request.form("Postcode") Phone=request.form("Phone") Add=request.form("Add") Email=request.form("Email") paytype=request.form("paytype") Notes=request.form("Notes") CompanyName=request.form("CompanyName") Fax=request.form("Fax") '判断购物车是否为空 ProductList = Session("ProductList") if productlist<>"" then sql="select * from Product where Product_Id in ("&productlist&") order by Product_Id" Set rs = conn.Execute( sql ) else response.redirect "error.asp?error=007" response.end end if %> <HTML> <HEAD> <TITLE>订单提交预览</TITLE> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta name="Contact" content="网域高科(www.wygk.cn),企业网站,企业网站管理系统,网域高科公司企业网站管理系统中英繁SQL版,企业公司网站系统SQL版,企业网站管理系统,企业网站源码"> <link href="mt_style.css" rel="stylesheet" type="text/css"> </HEAD> <BODY> <table width=100% cellpadding=0 cellspacing=0><tr><td><form name=confirm action="ordersent.asp" method=post><%=name%> <br> 您好!<br> 以下是您的订单,如果没有问题请 <input type="submit" value="马上提交订单">,或者返回 <input type="button" name="Submit21" onClick="javascript:history.go(-1)" value="返回修改订单"><br><br> 有任何疑问请及时和我们联系!<br> <br><br> <input type=hidden value="ok" name="confirm"> <table border="0" cellspacing="1" cellpadding="0" align="center" width="520" bgcolor="#000000"> <tr bgcolor="#FFFFFF"> <td height="25" colspan=4> 收货人信息</td></tr> <tr bgcolor="#FFFFFF"> <td height="25" colspan=4><font color="B0266D"> 收货人姓名:<%=Receiver%><br> 收货人电话:<%=Phone%><br> 收货人邮箱:<%=Email%><br> 收货地址:<%=Add%><br> 公司名称:<%=CompanyName%><br> 联系传真:<%=Fax%><br> 支付类型:<%=Paytype%> <br> 汇款账号: <% sqlp="select paytype,paymentmessage from paydefault where paytype='"&paytype&"'" set rsp=server.createobject("ADODB.Recordset") rsp.open sqlp,conn,1,1 response.write rsp("paymentmessage") rsp.close set rsp=nothing %> <br> 备注说明:<%=Notes%><br> <INPUT TYPE="hidden" name="Receiver" value="<%=Receiver%>"> <INPUT TYPE="hidden" name="Phone" value="<%=Phone%>"> <INPUT TYPE="hidden" name="Add" value="<%=Add%>"> <INPUT TYPE="hidden" name="Email" value="<%=Email%>"> <INPUT TYPE="hidden" name="Postcode" value="<%=Postcode%>"> <INPUT TYPE="hidden" name="PayType" value="<%=paytype%>"> <INPUT TYPE="hidden" name="Notes" value="<%=Notes%>"> <INPUT TYPE="hidden" name="CompanyName" value="<%=CompanyName%>"> <INPUT TYPE="hidden" name="Fax" value="<%=Fax%>"> </font></td> </tr> <tr bgcolor="#FFFFFF"> <td width="50%" height="25" align="center"> <font color="B0266D">商 品 名 称</font> </td> <td width="10%" align="center"> <font color="B0266D">数 量</font> </td> <td width="20%" align="center"> <font color="B0266D">单 价</font> </td> <td width="20%" align="center"> <font color="B0266D">合 计</font> </td> </tr> <% Sum = 0 While Not rs.EOF Quatity = CInt( Session(rs("Product_Id")) ) If Quatity <= 0 Then Quatity = 1 Session(rs("Title")) = Quatity Sum = Sum + csng(rs("Price")) * Quatity Sum=FormatNumber(Sum,2) session("sum")=sum %> <tr bgcolor="#FFFFFF"> <td width="50%" height="20"> <font color="B0266D"><%=rs("Title")%></font></td> <td width="10%"> <font color="B0266D"><%=Quatity%></font></td> <td width="20%"> <font color="B0266D"><%=FormatNumber(rs("Price"),2)%></font></td> <td width="20%"> <font color="B0266D"><%=FormatNumber(csng(rs("Price"))*Quatity,2)%></font></td> </tr> <% rs.MoveNext Wend rs.close set rs=nothing %> <tr bgcolor="#FFFFFF"> <td colspan="4" height="25" align="right"> <b><font color="#B0266D">总价格=<%=Sum%></font> </td> </tr> </table> </form></table> </BODY> </HTML> <% set conn=nothing %>